Chip 1998 September/CHIP Eylül 1998.iso/demolar/lokman/DISK1/_SETUP.2/Group1/Tarihdll.dll/0/RCDATA/THAREKSORDLG/THAREKSORDLG.txt

Text File | 1998-07-24 | 10KB | 397 lines

object HarekSorDlg: THarekSorDlg
  Left = 186
  Top = 77
  HelpContext = 531
  ActiveControl = OKBtn
  BorderStyle = bsDialog
  Caption = 'Cari Hareket Listesi Sorgusu'
  ClientHeight = 326
  ClientWidth = 343
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = [fsBold]
  KeyPreview = True
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 2
    Top = 4
    Width = 105
    Height = 13
    Caption = 'Krm.i�in Cari Kodu'
    FocusControl = EdKRKOD
  end
  object Label4: TLabel
    Left = 17
    Top = 215
    Width = 82
    Height = 13
    Caption = 'Hareket Tarihi'
    FocusControl = MaskEdRT1
  end
  object Label5: TLabel
    Left = 33
    Top = 238
    Width = 66
    Height = 13
    Caption = 'Vade Tarihi'
    FocusControl = MaskEdAL1
  end
  object Label6: TLabel
    Left = 193
    Top = 212
    Width = 8
    Height = 13
    Caption = '_'
  end
  object Label7: TLabel
    Left = 194
    Top = 235
    Width = 8
    Height = 13
    Caption = '_'
  end
  object Label8: TLabel
    Left = 1
    Top = 261
    Width = 99
    Height = 13
    Caption = 'Son Durum Tarihi'
    FocusControl = MaskEdFT1
  end
  object Label9: TLabel
    Left = 193
    Top = 258
    Width = 8
    Height = 13
    Caption = '_'
  end
  object SpeedBKK: TSpeedButton
    Left = 311
    Top = 2
    Width = 21
    Height = 20
    Hint = 'Cari Listesi (F5)'
    Glyph.Data = {
      10010000424D1001000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000000000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
      5555550000000000055555033333333305555503111111130555550313333313
      0555550313333313055555031330331305555503100000130555550310000013
      0555550300030003055555031000001305555503100000130555550311101113
      0555550333333333055555000000000005555555555555555555000000000000
      0000000000000000000000000000000000000000}
    ParentShowHint = False
    ShowHint = True
    OnClick = SpeedBKKClick
  end
  object SpeedBHAS: TSpeedButton
    Left = 235
    Top = 26
    Width = 21
    Height = 20
    Hint = 'Hasta Listesi (F6)'
    Glyph.Data = {
      10010000424D1001000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000000000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
      8888808088888888080880808888888808088000000000000008800000000000
      00088000000000000008800000000000000880FFFFFFFFFFFFF880CCCEEEEEEE
      EEE880CCCCECECECECE880BFFCBECECECEC880B0B8BCECECECE8801BF8888888
      8888801188888888888880008888888888888888888888888888000000000000
      0000000000000000000000000000000000000000}
    ParentShowHint = False
    ShowHint = True
    OnClick = SpeedBHASClick
  end
  object SpeedBTAR: TSpeedButton
    Left = 301
    Top = 235
    Width = 25
    Height = 25
    Hint = 'Takvime Bak'
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      33333FFFFFFFFFFFFFFF000000000000000077777777777777770FF7FF7FF7FF
      7FF07FF7FF7FF7F37F3709F79F79F7FF7FF077F77F77F7FF7FF7077777777777
      777077777777777777770FF7FF7FF7FF7FF07FF7FF7FF7FF7FF709F79F79F79F
      79F077F77F77F77F77F7077777777777777077777777777777770FF7FF7FF7FF
      7FF07FF7FF7FF7FF7FF709F79F79F79F79F077F77F77F77F77F7077777777777
      777077777777777777770FFFFF7FF7FF7FF07F33337FF7FF7FF70FFFFF79F79F
      79F07FFFFF77F77F77F700000000000000007777777777777777CCCCCC8888CC
      CCCC777777FFFF777777CCCCCCCCCCCCCCCC77777777777777770000}
    NumGlyphs = 2
    OnClick = SpeedBTARClick
  end
  object Label2: TLabel
    Left = 51
    Top = 29
    Width = 56
    Height = 13
    Caption = 'Hasta Ad�'
  end
  object Label3: TLabel
    Left = 31
    Top = 55
    Width = 76
    Height = 13
    Caption = 'Hasta Soyad�'
  end
  object OKBtn: TBitBtn
    Left = 3
    Top = 293
    Width = 77
    Height = 27
    TabOrder = 13
    OnClick = OKBtnClick
    Kind = bkOK
    Margin = 3
    Spacing = -1
    IsControl = True
  end
  object CancelBtn: TBitBtn
    Left = 90
    Top = 293
    Width = 77
    Height = 27
    Caption = '&Vazge�'
    TabOrder = 14
    OnClick = CancelBtnClick
    Kind = bkCancel
    Margin = 3
    Spacing = -1
    IsControl = True
  end
  object HelpBtn: TBitBtn
    Left = 176
    Top = 293
    Width = 77
    Height = 27
    HelpContext = 531
    TabOrder = 15
    Kind = bkHelp
    Margin = 3
    Spacing = -1
    IsControl = True
  end
  object EdKRKOD: TEdit
    Left = 110
    Top = 2
    Width = 197
    Height = 21
    Hint = 'Kurum Listesine Bak'
    MaxLength = 11
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    OnExit = EdKRKODExit
  end
  object RadioGroup1: TRadioGroup
    Left = 2
    Top = 127
    Width = 269
    Height = 81
    Caption = '&Evrak Tipi'
    Columns = 2
    Items.Strings = (
      'Nakit'
      '�ek'
      'Senet'
      'Di�er'
      'Al�m'
      'Mal Sat���(Versiye)'
      'Kurum Fat.')
    TabOrder = 3
  end
  object MaskEdRT1: TMaskEdit
    Left = 102
    Top = 212
    Width = 89
    Height = 21
    EditMask = '99/99/9999;1;_'
    MaxLength = 10
    TabOrder = 7
    Text = '  .  .    '
    OnEnter = MaskEdRT1Enter
    OnExit = MaskEdRTSONExit
  end
  object MaskEdRTSON: TMaskEdit
    Left = 204
    Top = 212
    Width = 89
    Height = 21
    EditMask = '99/99/9999;1;_'
    MaxLength = 10
    TabOrder = 8
    Text = '  .  .    '
    OnEnter = MaskEdRT1Enter
    OnExit = MaskEdRTSONExit
  end
  object MaskEdAL1: TMaskEdit
    Left = 102
    Top = 235
    Width = 89
    Height = 21
    EditMask = '99/99/9999;1;_'
    MaxLength = 10
    TabOrder = 9
    Text = '  .  .    '
    OnEnter = MaskEdRT1Enter
    OnExit = MaskEdRTSONExit
  end
  object MaskEdALSON: TMaskEdit
    Left = 204
    Top = 235
    Width = 89
    Height = 21
    EditMask = '99/99/9999;1;_'
    MaxLength = 10
    TabOrder = 10
    Text = '  .  .    '
    OnEnter = MaskEdRT1Enter
    OnExit = MaskEdRTSONExit
  end
  object MaskEdFT1: TMaskEdit
    Left = 102
    Top = 258
    Width = 89
    Height = 21
    EditMask = '99/99/9999;1;_'
    MaxLength = 10
    TabOrder = 11
    Text = '  .  .    '
    OnEnter = MaskEdRT1Enter
    OnExit = MaskEdRTSONExit
  end
  object MaskEdFTSON: TMaskEdit
    Left = 204
    Top = 258
    Width = 89
    Height = 21
    EditMask = '99/99/9999;1;_'
    MaxLength = 10
    TabOrder = 12
    Text = '  .  .    '
    OnEnter = MaskEdRT1Enter
    OnExit = MaskEdRTSONExit
  end
  object LISTEBtn: TBitBtn
    Left = 263
    Top = 293
    Width = 77
    Height = 27
    Caption = '&Hepsi'
    TabOrder = 16
    OnClick = LISTEBtnClick
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500000000000
      000557777777777777750BBBBBBBBBBBBBB07F5555FFFFFFF5570BBBB0000000
      BBB07F5557777777FF570BBB077BBB770BB07F557755555775570BBBBBBBBBBB
      BBB07F5555FFFFFFF5570BBBB0000000BBB07F5557777777F5570BBBB0FFFFF0
      BBB07F5557FFFFF7F5570BBBB0000000BBB07F555777777755570BBBBBBBBBBB
      BBB07FFFFFFFFFFFFFF700000000000000007777777777777777500FFFFFFFFF
      F005577FF555FFFFF7755500FFF00000005555775FF7777777F5550F777FFFFF
      F055557F777FFF5557F5550000000FFF00555577777775FF77F5550777777000
      7055557FFFFFF777F7F5550000000000005555777777777777550000}
    Margin = 3
    NumGlyphs = 2
    Spacing = -1
  end
  object CheckBoxB: TCheckBox
    Left = 279
    Top = 138
    Width = 57
    Height = 17
    Caption = 'Bor�'
    State = cbChecked
    TabOrder = 5
  end
  object CheckBoxA: TCheckBox
    Left = 278
    Top = 164
    Width = 65
    Height = 17
    Caption = 'Alacak'
    State = cbChecked
    TabOrder = 6
  end
  object RadioGroup2: TRadioGroup
    Left = 3
    Top = 74
    Width = 269
    Height = 48
    Caption = '&Son Durum'
    Columns = 2
    Items.Strings = (
      'A��k'
      'Kapat�ld�'
      'Cirolu'
      'Kar��l�ks�z/Protesto')
    TabOrder = 4
  end
  object EditHSTAD: TEdit
    Left = 110
    Top = 25
    Width = 121
    Height = 21
    Color = clWhite
    TabOrder = 1
    OnExit = EditHSTADExit
  end
  object EditHSTSOYAD: TEdit
    Left = 110
    Top = 49
    Width = 121
    Height = 21
    TabOrder = 2
    OnExit = EditHSTADExit
  end
  object krBak: TTable
    DatabaseName = 'ECZ'
    TableName = 'KRMLAR.DB'
    Left = 32
    Top = 44
    object krBakKOD: TStringField
      FieldName = 'KOD'
      Required = True
      Size = 11
    end
    object krBakAD: TStringField
      FieldName = 'AD'
      Required = True
      Size = 36
    end
  end
  object HastBak: TTable
    DatabaseName = 'ECZ'
    IndexName = 'HAS_AD_SOY'
    TableName = 'HASTA.DB'
    Left = 290
    Top = 25
    object HastBakHASTANO: TIntegerField
      FieldName = 'HASTANO'
    end
    object HastBakHASTADI: TStringField
      FieldName = 'HASTADI'
      Size = 18
    end
    object HastBakHASTASOYAD: TStringField
      FieldName = 'HASTASOYAD'
      Size = 18
    end
  end
end